home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
301-325
/
disk_313
/
uucp
/
uucp1.lzh
/
src
/
GUtil
/
uident.c
< prev
next >
Wrap
C/C++ Source or Header
|
1990-01-10
|
925b
|
65 lines
/*
* UIDENT.C
*
* (C) Copyright 1989-1990 by Matthew Dillon, All Rights Reserved.
*
* UIDENT files...
*
* Searches for @($) <string> \0 and prints out
*/
#include <stdio.h>
#include <fcntl.h>
#include "/version.h"
IDENT(".01");
void FindIdent();
char Buf[8192];
void
main(ac, av)
char **av;
{
short i;
int fd;
for (i = 1; i < ac; ++i) {
printf("%-15s ", av[i]);
fd = open(av[i], O_RDONLY);
if (fd > 0)
FindIdent(fd);
else
printf("(unable to open)");
puts("");
fflush(stdout);
if (fd > 0)
close(fd);
}
}
void
FindIdent(fd)
int fd;
{
long n;
long i;
long x = 0;
while ((n = read(fd, Buf + x, sizeof(Buf) - x)) > 0) {
n += x;
for (i = n - 128; i >= 0; --i) {
if (Buf[i] == '@' && Buf[i+1] == '(' && Buf[i+2] == '$' && Buf[i+3] == ')') {
printf("%s", Buf + i);
}
}
x = 128;
if (n < x)
x = n;
movmem(Buf + n - x, Buf, x);
}
}